home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio 2000 #1 / Ham Radio 2000.iso / ham2000 / tcp_ip / ka9q / expiry / newsrun.bat < prev    next >
Encoding:
DOS Batch File  |  1990-05-16  |  1.1 KB  |  48 lines
  1. echo off
  2.  
  3. rem News Handler
  4.  
  5. rem UNTESTED !!!
  6.  
  7. rem Written by Bernie Roehl, May 1990
  8.  
  9. :outer_loop
  10. if exist \done_it.dat del \done_it.dat
  11.  
  12. :loop
  13. rem Check if user hit a key; if so, exit back to NOS
  14. checkkey
  15. if errorlevel 1 goto done
  16.  
  17. rem Slow done the batch file by waiting here for a minute
  18. sleep 60
  19.  
  20. rem Check to see if we're in the expiry 'window'
  21. inwindow 10:00-11:00
  22. if not errorlevel 1 goto outer_loop
  23.  
  24. rem Check to see if we've already done the expiry this time 'round
  25. if exist \done_it.dat goto loop
  26.  
  27. rem We're in the window... is it time to do the expire?
  28. isittime \expire.tim
  29. if not errorlevel 1 goto loop
  30.  
  31. rem Expire articles under \spool\mail and its subdirectories, with the
  32. rem following conditions:
  33.  
  34. rem      Each newsgroup is allowed to have no more than 25 kbytes in it
  35. rem      Each newsgroup is allowed to have no more than 100 articles in it
  36. rem      Articles that arrived more than 5 days ago are to be discarded
  37.  
  38. expire \spool\mail 25,100,5 \expire.dat
  39. echo x >\done_it.dat
  40.  
  41. goto loop
  42.  
  43. :done
  44. echo Exiting newsrun.bat ...
  45.  
  46. rem End of newsrun.bat
  47.  
  48.